unit uSAF0606_00;

interface

uses
   SysUtils,
   Classes,
   DB,
   ADODB,
   DBClient,

   //--< Rave >--//
   RpBase,
   RpCon,
   RpConDS,
   RpDefine,
   RpDevice,
   RpRave,
   RpSystem,
   RvClass,
   RvCsData,
   RvCsDraw,
   RvCsStd,
   RvCsRpt,
   RvData,
   RvDefine,
   RvDirectDataView,
   RvUtil,
   RpRender,
   RpRenderPDF;

type
   TDMRelatorios = class(TDataModule)
      rvRelatorio: TRvProject;
      rvVideo: TRvSystem;
      rvImpressora: TRvSystem;
      rvPDF: TRvRenderPDF;
      rvDSContas: TRvDataSetConnection;
      qryContas: TADOQuery;
      qryContasTIPO: TIntegerField;
      qryContasTIPO_DESCRICAO: TWideStringField;
      qryContasLANC_QTDE: TIntegerField;
      qryContasTOTAL_DESCONTO: TFloatField;
      qryContasTOTAL_JUROS: TFloatField;
      qryContasTOTAL_VALOR: TFloatField;
      rvDSEmpresa: TRvDataSetConnection;
      qryEmpresa: TADOQuery;
      qryContasCC_CODIGO: TFloatField;
      qryContasCC_DESCRICAO: TWideStringField;
      qryContasTOTAL: TFloatField;
      qryContasTOTAL2: TFloatField;
      qryContasReceber: TADOQuery;
      qryContasReceberTIPO: TIntegerField;
      qryContasReceberTIPO_DESCRICAO: TWideStringField;
      qryContasReceberCC_CODIGO: TFloatField;
      qryContasReceberCC_DESCRICAO: TWideStringField;
      qryContasReceberCR_DESCRICAO: TWideStringField;
      qryContasReceberVALOR: TFloatField;
      qryContasReceberDESCONTO: TFloatField;
      qryContasReceberTOTAL: TFloatField;
      rvDSContasReceber: TRvDataSetConnection;
      qryContasPagar: TADOQuery;
      IntegerField1: TIntegerField;
      WideStringField1: TWideStringField;
      FloatField1: TFloatField;
      WideStringField2: TWideStringField;
      FloatField2: TFloatField;
      FloatField3: TFloatField;
      FloatField4: TFloatField;
      rvDSContasPagar: TRvDataSetConnection;
      qryContasPagarCP_DESCRICAO: TWideStringField;
      qryContasPagarJUROS: TFloatField;
      qryContasReceberJUROS: TFloatField;
      qryContasResumo: TADOQuery;
      rvDSContasResumo: TRvDataSetConnection;
      qryContasResumoTIPO: TIntegerField;
      qryContasResumoTIPO_DESCRICAO: TWideStringField;
      qryContasResumoSOMA_DESCONTO: TFloatField;
      qryContasResumoSOMA_JUROS: TFloatField;
      qryContasResumoSOMA_VALOR: TFloatField;
      qryContasResumoSOMA_TOTAL: TFloatField;
    qryBalancoMatoGrosso: TADOQuery;
    rvDSBalancoMatoGrosso: TRvDataSetConnection;
    qryBalancoMatoGrossoDetalhe: TADOQuery;
    rvDSBalancoMatoGrossoDetalhe: TRvDataSetConnection;
    qryContasPagarLanamento: TIntegerField;
    qryContasPagarData_Lanamento: TWideStringField;
    qryContasReceberLanamento: TIntegerField;
    qryContasReceberData_Lanamento: TWideStringField;
    qryBalancoMatoGrossoDetalheTipo: TIntegerField;
    qryBalancoMatoGrossoDetalheTipo_Descrio: TWideStringField;
    qryBalancoMatoGrossoDetalheLanamento: TIntegerField;
    qryBalancoMatoGrossoDetalheData_Lanamento: TDateTimeField;
    qryBalancoMatoGrossoDetalheCaixa_Contas_Codigo: TWideStringField;
    qryBalancoMatoGrossoDetalheDocumento: TWideStringField;
    qryBalancoMatoGrossoDetalheLanamento_Descrio: TWideStringField;
    qryBalancoMatoGrossoDetalheVencimento: TDateTimeField;
    qryBalancoMatoGrossoDetalhePendente: TFloatField;
    qryBalancoMatoGrossoDetalheLiquidado: TFloatField;
    qryBalancoMatoGrossoDetalheTotal: TFloatField;
    qryBalancoMatoGrossoTipo: TIntegerField;
    qryBalancoMatoGrossoTipo_Descrio: TWideStringField;
    qryBalancoMatoGrossoLanamento: TIntegerField;
    qryBalancoMatoGrossoCaixa_Contas_Codigo: TWideStringField;
    qryBalancoMatoGrossoTotal: TFloatField;
    qryBalancoMatoGrossoCaixa_Contas_Descrio: TStringField;
    qryBalancoMatoGrossoDetalheCaixa_Contas_Descrio: TStringField;
    qryBalancoMatoGrossoDetalheFavorecido_Codigo: TIntegerField;
    qryBalancoMatoGrossoDetalheFavorecido_Razo_Social: TWideStringField;
    qryBalancoEstoque: TADOQuery;
    rvDSBalancoEstoque: TRvDataSetConnection;
    qryBalancoEstoqueDetalhe: TADOQuery;
    rvDSBalancoEstoqueDetalhe: TRvDataSetConnection;
    qryBalancoEstoqueDetalheTipo: TIntegerField;
    qryBalancoEstoqueDetalheTipo_Descrio: TWideStringField;
    qryBalancoEstoqueDetalheLanamento: TIntegerField;
    qryBalancoEstoqueDetalheData_Lanamento: TDateTimeField;
    qryBalancoEstoqueDetalheCaixa_Contas_Codigo: TWideStringField;
    qryBalancoEstoqueDetalheDocumento: TWideStringField;
    qryBalancoEstoqueDetalheLanamento_Descrio: TWideStringField;
    qryBalancoEstoqueDetalheFornecedor_Codigo: TIntegerField;
    qryBalancoEstoqueDetalheFornecedor_Razo_Social: TWideStringField;
    qryBalancoEstoqueDetalheVencimento: TDateTimeField;
    qryBalancoEstoqueDetalhePendente: TIntegerField;
    qryBalancoEstoqueDetalheLiquidado: TIntegerField;
    qryBalancoEstoqueDetalheTotal: TFloatField;
    qryBalancoEstoqueDetalheCaixa_Contas_Descrio: TStringField;
    qryBalancoEstoqueDetalheProduto_Descrio: TStringField;
    qryBalancoEstoqueTipo: TIntegerField;
    qryBalancoEstoqueTipo_Descrio: TWideStringField;
    qryBalancoEstoqueLanamento: TIntegerField;
    qryBalancoEstoqueCaixa_Contas_Codigo: TWideStringField;
    qryBalancoEstoquePendente: TIntegerField;
    qryBalancoEstoqueLiquidado: TIntegerField;
    qryBalancoEstoqueTotal: TFloatField;
    qryBalancoEstoqueCaixa_Contas_Descrio: TStringField;
    qryBalancoMatoGrossoPendente: TIntegerField;
    qryBalancoMatoGrossoLiquidado: TIntegerField;

   private

      { Private declarations }

   public

      { Public declarations }

   end;

var
   DMRelatorios: TDMRelatorios;

implementation

{$R *.dfm}

uses
   uLibGlobal,
   uSAF0606_01;

end.

